Fix switching to top-level from which-key-undo-key

diff --git a/which-key.el b/which-key.el
index e38571fbb24fbf1b485f6ff7703d65cc6beacac7..010266695b1e302d176de96be4d6f521b725930e 100644 (file)
--- a/which-key.el
+++ b/which-key.el
@@ -2246,7 +2246,8 @@ current evil state. "
           (key-lst
            (which-key-reload-key-sequence key-lst)
            (which-key--create-buffer-and-show (apply #'vector key-lst)))
-          (t (which-key-show-top-level)))))
+          (t (setq which-key--automatic-display nil)
+             (which-key-show-top-level)))))
 (defalias 'which-key-undo 'which-key-undo-key)
 
 (defun which-key-abort (&optional _)